home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / JZGETDR.C < prev    next >
Text File  |  1988-12-18  |  581b  |  27 lines
  1. #include <jaz.h>
  2. /*
  3. ┌────────────────────────────────────────────────────────────────────────────┐
  4. │jzgetdr                                     │
  5. │get the current working sub-directory                         │
  6. │Synopsis:                                     │
  7. │   jzgetdr(wdirectory);                             │
  8. │                                         │
  9. └────────────────────────────────────────────────────────────────────────────┘
  10. */
  11.  
  12. jzgetdr(fdir)
  13. char *fdir;
  14. {
  15.    TREG wreg;
  16.  
  17.    wreg.h.ah = 0x47;
  18.    wreg.x.ds = getds();
  19.    wreg.x.si = (int) fdir;
  20.    wreg.h.dl = 0;        /* default directory */
  21.  
  22.    msdos(&wreg);
  23.  
  24.    if (wreg.x.flags & 1)
  25.      *fdir = 0;
  26. }
  27.